clear all

local path0="C:\Dropbox\GeneticsProject (1)\REStat\round_accepted_replication_files\"
local path1="C:\Dropbox\GeneticsProject (1)\REStat\round_accepted_replication_files\outregs"

capture cd "`path0'Workfiles"
set more off
use completed_data, clear

	*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~`		
	*			scatterplot for countries with different shares
	*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~`	
			

	twoway (scatter pwt_ln_rgdpwok idv   if share_putterman>0.8 & share_putterman~=., mlabel(countrycode) mfcolor(none)) ///
		(lfit pwt_ln_rgdpwok idv   if share_putterman>0.8 & share_putterman~=.), ///
		legend(off) ///
		ytitle("Log GDP per worker") xtitle("Hofstede's index of individualism") ///
		title("Panel A: Share of indig. pop. > 0.8") ///
		xlabel(10(10)100) ylabel(7(1)12) ///
		name(fig1, replace)
		
	twoway (scatter pwt_ln_rgdpwok idv   if share_putterman>0.9 & share_putterman~=., mlabel(countrycode) mfcolor(none)) ///
		(lfit pwt_ln_rgdpwok idv   if share_putterman>0.9 & share_putterman~=.), ///
		legend(off) ///
		ytitle("Log GDP per worker") xtitle("Hofstede's index of individualism") ///
		title("Panel B: Share of indig. pop. > 0.9") ///
		xlabel(10(10)100) ylabel(7(1)12) ///		
		name(fig2, replace)
		
	twoway (scatter pwt_ln_rgdpwok idv   if share_putterman>0.95 & share_putterman~=., mlabel(countrycode) mfcolor(none)) ///
		(lfit pwt_ln_rgdpwok idv   if share_putterman>0.95 & share_putterman~=.), ///
		legend(off) ///
		ytitle("Log GDP per worker") xtitle("Hofstede's index of individualism") ///
		title("Panel C: Share of indig. pop. > 0.95") ///
		xlabel(10(10)100) ylabel(7(1)12) ///		
		name(fig3, replace)
		
	twoway (scatter pwt_ln_rgdpwok idv , mlabel(countrycode) mfcolor(none)) ///
		(lfit pwt_ln_rgdpwok idv ), ///
		legend(off) ///
		ytitle("Log GDP per worker") xtitle("Hofstede's index of individualism") ///
		title("Panel D: all countries") ///
		xlabel(10(10)100) ylabel(7(1)12) ///		
		name(fig4, replace)
		
	graph combine fig1 fig2 fig3 fig4, imargin(tiny)
	

